10 IFI=0THENI=1:LOAD"DISINTEGRATOR",8,1 20 SYS49152